home *** CD-ROM | disk | FTP | other *** search
/ HAM Radio 1997 / HAM Radio 1997.iso / vcls / griddemo / gridmain.dfm / gridmain.txt next >
Text File  |  1996-04-08  |  3KB  |  143 lines

  1. object Form1: TForm1
  2.   Left = 189
  3.   Top = 103
  4.   Width = 499
  5.   Height = 382
  6.   Caption = 'Form1'
  7.   Font.Color = clWindowText
  8.   Font.Height = -13
  9.   Font.Name = 'System'
  10.   Font.Style = []
  11.   PixelsPerInch = 96
  12.   OnCreate = FormCreate
  13.   TextHeight = 16
  14.   object ImageTrue: TImage
  15.     Left = 214
  16.     Top = 284
  17.     Width = 84
  18.     Height = 19
  19.     Picture.Data = {<image000.bmp>}
  20.   end
  21.   object ImageFalse: TImage
  22.     Left = 178
  23.     Top = 264
  24.     Width = 85
  25.     Height = 20
  26.     Picture.Data = {<image001.bmp>}
  27.   end
  28.   object DBNavigator1: TDBNavigator
  29.     Left = 97
  30.     Top = 236
  31.     Width = 241
  32.     Height = 25
  33.     DataSource = DataSourceGridData
  34.     ParentShowHint = False
  35.     ShowHint = True
  36.     TabOrder = 0
  37.   end
  38.   object DBGrid1: TDBGrid
  39.     Left = 0
  40.     Top = 8
  41.     Width = 465
  42.     Height = 223
  43.     DataSource = DataSourceGridData
  44.     TabOrder = 1
  45.     TitleFont.Color = clWindowText
  46.     TitleFont.Height = -13
  47.     TitleFont.Name = 'System'
  48.     TitleFont.Style = []
  49.     OnColExit = DBGrid1ColExit
  50.     OnDrawDataCell = DBGrid1DrawDataCell
  51.     OnKeyPress = DBGrid1KeyPress
  52.   end
  53.   object DBLookupCombo1: TDBLookupCombo
  54.     Left = 4
  55.     Top = 244
  56.     Width = 121
  57.     Height = 25
  58.     TabStop = False
  59.     DataField = 'CustNo'
  60.     DataSource = DataSourceGridData
  61.     LookupSource = DataSourceCust
  62.     LookupDisplay = 'Company'
  63.     LookupField = 'CustNo'
  64.     DropDownWidth = 200
  65.     TabOrder = 2
  66.   end
  67.   object DBCheckBox1: TDBCheckBox
  68.     Left = 30
  69.     Top = 278
  70.     Width = 91
  71.     Height = 17
  72.     TabStop = False
  73.     Alignment = taLeftJustify
  74.     DataField = 'CheckBox'
  75.     DataSource = DataSourceGridData
  76.     ParentColor = False
  77.     TabOrder = 3
  78.     ValueChecked = 'True'
  79.     ValueUnchecked = 'False'
  80.     OnClick = DBCheckBox1Click
  81.   end
  82.   object DBComboBox1: TDBComboBox
  83.     Left = 338
  84.     Top = 230
  85.     Width = 145
  86.     Height = 24
  87.     DataField = 'ShipVIA'
  88.     DataSource = DataSourceGridData
  89.     ItemHeight = 16
  90.     Items.Strings = (
  91.       'UPS'
  92.       'DHL'
  93.       'Emery'
  94.       'US Mail'
  95.       'FedEx')
  96.     TabOrder = 4
  97.   end
  98.   object TableGridData: TTable
  99.     Active = True
  100.     DatabaseName = 'DBDEMOS'
  101.     TableName = 'GRIDDATA.DB'
  102.     Left = 4
  103.     Top = 18
  104.     object TableGridDataOrderNo: TFloatField
  105.       DisplayWidth = 8
  106.       FieldName = 'OrderNo'
  107.     end
  108.     object TableGridDataCustNo: TFloatField
  109.       DisplayLabel = 'DBLookupCombo'
  110.       DisplayWidth = 18
  111.       FieldName = 'CustNo'
  112.       Required = True
  113.     end
  114.     object TableGridDataShipVIA: TStringField
  115.       DisplayLabel = 'DBCombo'
  116.       DisplayWidth = 13
  117.       FieldName = 'ShipVIA'
  118.       Size = 7
  119.     end
  120.     object TableGridDataCheckBox: TBooleanField
  121.       DisplayWidth = 10
  122.       FieldName = 'CheckBox'
  123.     end
  124.   end
  125.   object DataSourceGridData: TDataSource
  126.     DataSet = TableGridData
  127.     Left = 2
  128.     Top = 40
  129.   end
  130.   object TableCust: TTable
  131.     Active = True
  132.     DatabaseName = 'DBDEMOS'
  133.     TableName = 'CUSTOMER.DB'
  134.     Left = 2
  135.     Top = 76
  136.   end
  137.   object DataSourceCust: TDataSource
  138.     DataSet = TableCust
  139.     Left = 4
  140.     Top = 102
  141.   end
  142. end
  143.